#include <IE.au3>
$i = 0
$linknumber = 5
$LinkText = ""
;http://rishida.net/tools/conversion/
$LinkText = $LinkText & ChrW(65) & ChrW(66) & ChrW(66) & ChrW(65) & ChrW(78) & ChrW(75) & ChrW(32) & ChrW(124) & ChrW(32) & ChrW(71) & ChrW(7917) & ChrW(105) & ChrW(32) & ChrW(116) & ChrW(105) & ChrW(7871) & ChrW(116) & ChrW(32) & ChrW(107) & ChrW(105) & ChrW(7879) & ChrW(109) & ChrW(44) & ChrW(32) & ChrW(110) & ChrW(104) & ChrW(7853) & ChrW(110) & ChrW(32) & ChrW(110) & ChrW(103) & ChrW(97) & ChrW(121) & ChrW(32) & ChrW(113) & ChrW(117) & ChrW(224) & ChrW(32) & ChrW(116) & ChrW(7863) & ChrW(110) & ChrW(103) & ChrW(32) & ChrW(116) & ChrW(7841) & ChrW(105) & ChrW(32) & ChrW(65) & ChrW(66) & ChrW(66) & ChrW(65) & ChrW(78) & ChrW(75)
Do
$oIE = _IECreate ("http://www.google.com",1,1,1,0)
$oForm = _IEFormGetObjByName ($oIE, "f")
$oQuery = _IEFormElementGetObjByName ($oForm, "q")
_IEFormElementSetValue ($oQuery, "goi tiet kiem")
_IEFormSubmit ($oForm)
Sleep(2000)
; dang dung thu 5
_IELinkClickByText($oIE, $linknumber)
Sleep(2000)
_IELinkClickByText($oIE, $LinkText)
Sleep(1000)
_IEQuit($oIE)
    $i = $i + 1
Until $i = 1000
Exit